home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 4
/
Aminet 4 - November 1994.iso
/
aminet
/
dev
/
gui
/
desigdemo.lha
/
DesignerDemo
/
MultipleDemo
/
Defs.pas
< prev
next >
Wrap
Pascal/Delphi Source File
|
1994-05-13
|
645b
|
20 lines
unit defs;
interface
Uses exec,intuition,gadtools,graphics,amiga,diskfont,
workbench,utility;
type
pwindownode = ^twindownode; { type definition for the node }
twindownode = record { in a seperate unit so it can }
ln_succ : pwindownode; { be used in the produced unit }
ln_pred : pwindownode; { enabling an extra parameter }
pwin : pwindow; { to be passed allowing multiple }
pwinglist : pgadget; { windows to work }
pwingads : array [0..10] of pgadget;
pwinvisualinfo : pointer;
end;
implementation
end.